10 REM BUNTER BILDSCHIRM
20 REM
30 REM BILDSCHIRM MIT EINEM ZEICHEN FUELLEN
40 FORX=1024TO2023
60 POKEX,207:NEXT
70 REM FARBEN AENDERN
80 FA=INT(RND(TI)*16)
90 S=0.8+RND(TI)*6
100 FOR X=55296 TO 56296 STEP S
110 POKEX,FA:NEXT
120 GOTO80